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INTRODUCTION 

The MC146805G2 is a fully static single-chip CMOS 
Microcomputer. It has 1 12 bytes of RAM, 2106 bytes of user 
ROM, four 8-bit input/ output ports, a timer, and an on-chip 
oscillator. The MCI 46805 G2L1 ROM contains a monitor 
routine which provides the user with the ability to evaluate 
the MC146805G2 using a standard RS232 terminal. The user 
can enter short programs into the on-chip RAM and execute 
them via the monitor. A description of the monitor operation 
follows along with an assembled listing of the actual pro- 
gram. 

MONITOR MODE 

In this mode the MCI 46805 G2L1 Microcomputer is con- 
nected to a terminal capable of running at 300, 1200, 4800, or 
9600 baud. Figure 1 contains a schematic diagram of the 
monitor mode connections and a table showing CO and Cl 
switch settings to obtain a baud rate that matches the ter- 
minal. Be sure the oscillator frequency is 3.579545 MHz. Any 
area of RAM from location $18 to $7 A may be used for pro- 
gram storage; however, upper locations may be needed for 
user stack. 

When the microcomputer is reset, a power-up message is 
printed. Following the message, the prompt character “.’’is 
printed and the monitor waits for a response. The response 
may consist of single letter commands with some commands 
requiring additional input. Unrecognized commands respond 
by printing Valid commands are: 

R — Display the Register 
A — Display/Change the Accumulator 
X — Display/Change the Index Register 
M — Display/Change Memory 
C — Continue Program Execution 
E — Execute Program at Address 
S — Display State of I/O and Timer 


R — Display the Register 

The processor registers are displayed as they appear on the 
stack. The format of the register print is: 

HINZC AA XX PP 

The first field shows the state of the condition code register 
bits. Each bit in the register has a single letter corresponding 
to the bit name. If the letter is present, the bit is 1. If a ‘V. is 
printed in place of the letter, that bit is 0. For example, 
“H..ZC” means that the H, Z, and C bits are 1 and that the I 
and N bits are 0. The remainder of the line shows the status 
of the accumulator, index register, and program counter, 
respectively. The stack pointer is always at a fixed address (in 
this case $7 A). The values shown are the values loaded into 
the CPU when a “C” or “E” command is executed. All 
register values except the condition code register can be 
changed with other commands. To change the condition 
code register, it is necessary to use the memory change com- 
mand and modify location $7B. 

A — Examine/Change the Accumulator 

This command begins by printing the current value of the 
accumulator and then waits for more input. In order to 
change the current value, type in a new value (two hex digits). 
To leave the accumulator unchanged, type any non-hex digit 
(a space is a good choice). 

X — Examine/Change the Index Register 

This procedure is the same as the “A” command, but af- 
fects the index register instead. 

M — Examine/ Change Memory 

Any memory location may be examined or changed with 
this command (except of course, ROM). To begin, type “M” 
followed by a hexadecimal address in the range 
$0000-$ 1FFF. The monitor responds by beginning a new line 
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FIGURE 1. Monitor Mode Schematic Diagram 


and printing the memory address followed by the current 
contents of that location. At this point you may type: 

1. and re-examine the same byte. (Try this with loca- 
tion $0008.) 

2. “A” and go to the previous byte. Typing “A” at loca- 
tion $0000 causes the monitor to go to $1FFF. 

3. “CR” and go to the next byte. “CR” is the carriage 
return character. The byte after $1FFF is $0000. 

4. “DD”, where “DD” is a valid 2-digit hexadecimal 
number . The new data is stored at the current address 
and the monitor then goes to the next location. This 
means that to enter a program it is only necessary to go 
to the starting address of the program and start typing 
in the bytes. To see if the byte was really inputted, you 
can use the “A” character to return to the last byte 
typed in. 

5. Finally, any character other than those described 
above causes the memory command to return to the 
prompt level of the monitor and prints 


C — Continue Program Execution 

The “C” command merely executes an RTI instruction. 
This means that all the registers are reloaded exactly as they 
are shown in the register display. Execution continues until 
the reset switch is depressed or the processor executes an 
SW1. Upon executing an SWI, the monitor regains control 
and prints the prompt character. This feature can be used for 
an elementary form of breakpoints. Since there is really no 
way to know where the stack pointer is after an SWI, the 
monitor assumes that it is at $7 A. This will not be the case if 
an SWI is part of a subroutine. In this case, the monitor will 
be re-entered but the stack pointer will point to $78. This is 
perfectly valid and typing “C” will pick up the program 
from where it left off. However, the A, X, R, and E com- 
mands all assume the stack starts at $7A and will not func- 
tion properly. If the stack location is known, it is still possi- 
ble to examine the registers by using the M command. 

E — Start Execution at Address 

The “E” command waits for a valid memory address 
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($0000-$ 1FFF) and places the address typed on the stack at 
locations $7E and $7F. The command then executes an RTI 
just like the “C” command. If the address typed is not a 
valid memory address, the command exits to the monitor 
without changing the current program counter value. 

S — Display I/O States and Timer 

The “S” command displays ports A, B, C, and D data 
along with the timer data and control register contents. The 
format of the display is: 

A B C D TIM TCR 


The data displayed is simply memory (RAM) locations 
$0000-$0003 with $0008 and $0009. Ports A, B, and D may 
be written to by first making them all outputs; i.e., for port 
A, change location $0004 (port A DDR) to $FF. Port C and 
the timer registers cannot be changed as they are used by the 
monitor. 

MONITOR PROGRAM 

A flowchart for the monitor mode program is provided in 
Figure 2. A listing for the ROM monitor program is attached 
to the end of this application note. 



FIGURE 2. Monitor Mode Operating Flowchart 
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Page 1 


Sep 


•a- 

* MC146805G2 ROM PATTERN 

* 

* The MC6805G2 single-chip microcomputer is a 40-pin CMOS 

* device with 2096 bytes of ROM, 112 bytes of RAM, four 

* 8-bit I/O ports, a timer and an external interrupt 

* input The ROM contains two separate programs. Either 

* of these programs may be selected on reset by wiring port 

* Casfoll ows : 

* 

* C7 

#• — 

* 1 

* 1 

* 1 

* i 

* o 

* 

* The monitor is sub s tan t i a 1 1 y the same as all previous 

* monitors for the 6805. The monitor uses serial I/O for 

* its communication with the operator. Serial input is C2 

* and serial output is C3. 

■» 

* - — — — — — — — — 


Cl CO function 

0 0 monitor (300 baud) 

0 1 monitor (1200 baud) 

1 0 monitor (4800 baud) 

1 1 monitor (9600 baud) 

X X bicycle odometer 


* 

* I/O Register Addresses 


0000 

00 

00 

porta 

equ 

*000 

I/O port 0 

0000 

00 

01 

p or t b 

equ 

*001 

I/O port 1 

0000 

00 

02 

p or tc 

equ 

*002 

I/O port 2 

0000 

00 

03 

p or t d 

equ 

*003 

I/O port 3 

0000 

00 

04 

d dr 

equ 

4 

data direction register offset 

0000 

00 

08 

timer 

equ 

*008 

8-bit timer register 

0000 

00 

09 

ter 

equ 

*009 

timer control register 

0000 

00 

10 

RAM 

equ 

*010 

start of on-chip ram 

0000 

00 

80 

ZROM 

equ 

*080 

start of page zero rom 

0000 

01 

00 

ROM 

equ 

*100 

start of main rom 

0000 

20 

00 

MEMSIZ 

# 

* 

equ * •* 2000 memory address space size 

Character Constants 

0000 

00 

Od 

CR 

equ 

*0D 

carriage return 

0000 

00 

Oa 

LF 

equ 

*0A 

line feed 

0000 

00 

20 

BL 

equ 

420 

blank 

0000 

00 

00 

EOS 

* 

equ 

*00 

end of string 


porta+ddr) 


* 

*■*#■*■»*■*■«■-* ***#**-»•#******■*■#••»■ ■* •***#*■«■*■** **#**********•**■#■•»****■*-*■*•* **#■#*#*** * 


* ROM MONITOR for the 146805G2 

* 

* Written by Ed Rupp, 1980 

•* 

* 

* The monitor has the following commands: 

* 
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* 

R — 

Print registers. 




* 


format is CCCCC AA XX PPP 




* 

A — 

Print/change A accumulator. 




* 


Prints the register value, then 




•* 


waits for new value. Type 




* 


any non-hex character to exit. 




* 

X — 

Print/change X accumulator. 




■* 


Works the same as 'A',, except modifies X instead. 




* 

M — 

Memory examine/change. 




* 


Type M AAA to begin. 




* 


then type: — to re-examine current 




•* 


— to examine previous 




* 


CR — to examine next 




* 


DD — new data 




* 


Anything else exits memory command. 




* 

c — 

Continue program. Execution starts at 




* 


the location specified in the program 




* 


counter, and 




* 


continues until an swi is executed 




* 


or until reset. 




*■ 

E — 

Execute from address. Format is 




* 


E AAAA. AAAA is any valid memory address 




* 

s — 

Display Machine State. All important registers are 




*■ 

* 


displayed. 




*■ 

* 

Special Equates 

0602 

00 

2e 

PROMPT 

equ 

'. prompt character 

0602 

00 

Od 

FWD 

equ 

CR g o t o ne x t b y te 

0602 

00 

5e 

BACK 

equ 

' /V - go to previous byte 

0602 

00 

2e 

SAME 

equ 

'. re-examine same byte 





Other 


0602 

00 

7f 

i n i t sp 

equ 

$7F initial stack pointer value 

0602 

00 

7a 

stack 

equ 

initsp-5 top of stack 




# 

ram var i ab les 

0602 

00 

10 

get 

equ 

RAM+0 4-byte no-mans land, see pick and drop subroutines 

0602 

00 

14 

a temp 

equ 

RAM+4 acca temp for getc.putc 

0602 

00 

15 

x temp 

equ 

RAM+5 x reg. temp for getc.putc 

0602 

00 

16 

c har 

equ 

RAM+6 current input/output character 

0602 

00 

17 

count 

equ 

RAM+7 number of bits left to get/send 




* 

state 

print machine state 




* 

A B 

C D TIM TCR 




* 

dd dd 

dd dd dd dd 
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* 

* 

header 

string for I/O register display 

0602 

Od 

Oa 





i omsg 

feb 

CR, LF 


0604 

20 

41. 

20 

20 

42 

20 


fee 

/ A B 

C D TIM TCR / 


20 

43 

20 

20 

44 

20 






54 

49 

4d 

20 

54 

43 





06 1 7 

Od 

Oa 

00 





feb 

CR, LF, EOS 

061a 

5f 






state 

c lr x 



061b 

d 6 

06 

02 




s ta te2 

Ida 

l omsg , x 

get next char 

06 le 

a 1 

00 






emp 

#EOS 

qu i t? 

0620 

27 

06 






beq 

s ta te3 

yes, now print values 

0622 

c d 

08 

01 





jsr 

p utc 

no, print char 

0625 

5c 







inc x 


bump pointer 

0626 

20 

f 3 






bra 

s ta te2 

do it aga in 

0628 







s ta te3 











* 

now print values underneath the header 

0628 

5f 







c lr x 



0629 

f 6 






p i o 

Ida 

, X 

start u/ith I/O ports 

062a 

c d 

07 

5e 





jsr 

p u tb y t 


062d 

c d 

07 

8b 





jsr 

puts 


0630 

5c 







inc x 



0631 

a3 

04 






cpx 

#4 

end of I/O? 

0633 

26 

f 4 






bne 

p i o 

no, do mare 

0635 

c d 

07 

8b 





jsr 

puts 


0638 

b6 

08 






Ida 

timer 

now print the value in the timer 

063a 

c d 

07 

5e 





jsr 

p u t b y t 


063d 

c d 

07 

8b 





jsr 

puts 


0640 

c d 

07 

8b 





jsr 

puts 


0643 

b6 

09 






Ida 

ter 

the control register too 

0645 

c d 

07 

5e 





jsr 

p u tby t 


0648 

20 

48 






bra 

mon i t 

all done 








* 

pcc 

print condition codes 








* 

string 

for pcc 

subrout ine 

064a 

48 

49 

4e 

5a 

43 


c c s tr 

fee 

/HINZC/ 


064f 

b6 

7b 





pec 

Ida 

s ta c k + 1 

condition codes in acca 

0651 

48 







as 1 a 


move h bit to bit 7 

0652 

48 







as 1 a 



0653 

48 







as 1 a 



0654 

b 7 

10 






s ta 

get 

save it 

0656 

5f 







c lr x 



0657 

a6 

2e 





pc c2 

Ida 

# 


0659 

38 

10 






as 1 

get 

put bit in c 

065b 

24 

03 






bee 

pcc3 

bit qff means print 

065d 

d6 

06 

4a 





Ida 

c c s tr, x 

pickup appropriate character 

0660 

c d 

08 

01 




p c c 3 

jsr 

p u t c 

print . or character 

0663 

5c 







inc x 


point to next in string 


67 



Sep 8 15: 10 1981 


146SG5G2 ROM Monitor Listing Pag 


0664 a 3 05 
0666 25 e f 
0668 81 


0669 ae 7c 
066b 20 02 


066d ae 7d 


066f f 6 
0670 cd 07 5e 
0673 cd 07 8b 
0676 cd 07 94 
0679 25 17 
067b f? 

067c 20 14 


067e ad cf 
0680 cd 07 8b 
0683 3f 1 1 
0685 a6 7c 
0687 b 7 12 
0689 cd 07 4b 
068c cd 07 4b 
Q68f cd 07 43 


0692 cd 07 7d 
0695 a6 2e 
0697 cd 08 01 
069a cd 07 c3 
069d a4 7f 
069f cd 07 8b 
06a2 al 41 
06a4 27 c 3 
06a6 al 58 
06a8 27 c3 
06aa al 52 
06ac 27 dO 
06ae al 45 
06b0 27 16 
06b2 al 43 
06b4 27 21 
06b 6 al 4d 
06b8 27 le 


seta 


se t x 


cpx 
bio 
r ts 

seta 

1 d x 
bra 


se tany 


se tany 

Ida 

i X 


jsr 

p utb y t 


jsr 

puts 


jsr 

g e t b y t 


b c s 

mon i t 


s ta 



bra 

mon i t 

* 

* 

reg s - 

print c 

* 

reg s 

b sr 

PCC 


jsr 

puts 


c lr 

ge t+ 1 


Ida 

#s ta c k + 


s ta 

ge t+2 


jsr 

o u t2h s 


jsr 

ou t2h s 


jsr 

o u t4h s 

* 

* 

fall 

into main 


* 

mon i t 

print 

* 

mon i t 

jsr 

c r 1 f 


Ida 

#PROMPT 


jsr 

p u tc 


#5 qui t after printing all 5 bits 

p c c 2 


examine/ change accumulator A 

#stack+2 point to A 
se tany 

examine/change accumulator X 
#stack+3 point to X 

print (x) and change if necessary 
pick up the data, and 


else replace with new value 
now return 


print cc register 
separate from next stuff 


jsr 
and 
jsr 
cmp 
b e q 
cmp 
beq 
cmp 
beq 
cmp 
beq 
cmp 
beq 
cmp 
beq 


print prompt and decode commands 

go to next line 

print the prompt 
getc get the command character 
#.<1111111 mask parity 
puts 

# ' A 
seta 
#'X 
se t x 

# 'R 
re g s 

# 'E 
exec 

# 'C 
c on t 

# 'M 
memory 


r - ■ ^ v y 

print space (won't destroy A) 
change A 

change X 

reg i s ter s 

execute 

continue 

memory 
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06 b a 

a 1 

53 



cmp 

06 b c 

26 

03 



bne 

06be 

c c 

06 

1 a 


J m P 

06 c 1 

06 

c 1 


mon i t2 

equ 

06 c 1 

a 6 

3f 



Ida 

06c3 

c d 

08 

01 


jsr 

06c6 

20 

c a 



bra 





* 






* 

exec 





* 


06c 8 

cd 

07 

94 

exec 

jsr 

06c b 

25 

c 5 



be s 

06c d 

97 




ta x 

06c e 

c d 

07 

94 


jsr 

06d 1 

25 

bf 



b c s 

06d3 

b? 

7f 



s ta 

06d 5 

bf 

7e 



S t X 





* 






* 

c on t 





* 


06d 7 

80 



c on t 

r t i 





* 






■* 

memory 







06 d 8 

c d 

07 

94 

memory 

J*r 

06db 

25 

b 5 



b c s 

06d d 

b7 

1 1 



s ta 

06d f 

c d 

07 

94 


jsr 

06e2 

25 

ae 



b c s 

06e4 

b 7 

12 



s ta 

06e6 

c d 

07 

7 d 

mem2 

jsr 

06e9 

b6 

1 1 



Ida 

06eb 

a4 

If 



and 

06e d 

c d 

07 

5e 


jsr 

06f 0 

b6 

12 



Ida 

06f 2 

c d 

07 

5e 


jsr 

06f 5 

c d 

07 

8b 


jsr 

06f 8 

ad 

2c 



bsr 

06 fa 

c d 

07 

5e 


jsr 

06f d 

c d 

07 

8b 


jsr 

0700 

c d 

07 

94 


jsr 

0703 

25 

06 



b c s 

0705 

ad 

25 



bsr 

0707 

ad 

33 


mem4 

bsr 

0709 

20 

db 



bra 

070b 

a 1 

2e 


mem3 

cmp 

070d 

27 

d7 



beq 

070f 

al 

Od 



cmp 

0711 

27 

f 4 



beq 

0713 

a 1 

5e 



cmp 

0715 

26 

Oc 



bne 

0717 

3a 

12 



dec 

0719 

b6 

12 



Ida 

071b 

al 

f f 



cmp 

071 d 

26 

c 7 



bne 


#'S display machine state 

mon i t2 

state commands are getting too far away 
* 

# '? none of the above 

p u tc 

monit loop around 

— execute from given address 

getbyt get high nybble 
monit bad digit 

save for a second 
getbyt now the low byte 
monit bad address 

stack+5 program counter low 
stack+4 program counter high 

— continue users program 

simple enough 

memory examine/change 

getbyt build address 
monit bad hex character 

g e t + 1 
getbyt 

monit bad hex character 

get+2 address is now in get+l&2 

crlf begin new line 

get+1 print current location 

#$1F mask upper 3 bits < 8K map) 

p u t b y t 

get+2 

p u t b y t 

puts a b lanky then 

pick get that byte 

putbyt and print it 

puts another blank; 

getbyt try to get a byte 

mem3 might be a special character 

drop otherwise; put it and continue 

bump go to next address 

mem2 and repeat 

#SAME re-examine same? 

mem2 yes; return without bumping 

#FWD go to next? 

mem4 yes; bump then loop 

#BACK. go back one byte? 

xmonit no» exit memory command 

get+2 decrement low byte 

get+2 check for underflow 

#*FF 

mem2 no underflow 
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071 f 3a 11 
0721 20 c 3 


0723 cc 06 92 


0726 bf 15 
0 7 28 a e d 6 
072a 20 04 


072c bf 15 
072e ae d7 


0730 bf 10 
0732 ae 81 
0734 bf 13 

0736 5f 

0737 bd 10 
0739 be 15 
073b 81 


073c 3c 12 
073e 26 02 
0740 3c 11 
0742 81 


0743 ad el 
0745 a4 If 


dec get + 1 

bra mem2 

* 

* convenient transfer point back to monit 

xmonit jmp monit return to monit 

* utilities 


* 

•* 

* 

* 

* 

* 

* 

pick 

4 


. wm anyuinere in memory 
this is a horrible routine (not merely 
self-modifying, but se 1 f- c rea t i ng ) 


ge t + l&2 point to address to read, 
byte is returned in A 
X is unchanged at exit 


s t x 
1 d x 
bra 


x temp 
#$D6 
c ommon 


save X 

D6=l da 2-byte indexed 


f put uyte to any memory location 

has the same undesirable properties 
as pick 

A has byte to store, and get+U-2 points 
to location to store 
A and X unchanged at exit 

*tx xtemp save X 

Idx #*D7 d7=sta S-b w te indexed 


common stx 
1 d x 


get put opcode in place 

#$81 8 1 — r t s 

get+3 now the return 

we want zero offset 

9 et execute this mess 

xtemp restore X 

and exit 

add one to current memory pointer 


A and X unchanged 


increment low byte 
non— zero means no carry 
increment high nybble 


“ r!r o nc°^n g P ^ n at d .xit a5 " address ' bum -> P»int.r 


out4hs bsr 
and 


pick get high nybble 

#*1F mask high bits 
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074/ 

ad 

15 



b sr 

putby t 

and print it 

0749 

ad 

f 1 



bsr 

bump 

go to next address 





* 

out2hs 

print byte pointed to, then a space 





* 


X is 

unchanged at exit 

074 b 

ad 

d 9 


out2h s 

b sr 

pick 

get the byte 

074 d 

b7 

10 



s ta 

get 

save A 

074 f 

44 




1 sra 



0750 

44 




1 sra 



0751 

44 




1 sra 



0752 

44 




1 sra 


shift high to low 

0753 

ad 

16 



b sr 

putny b 


0755 

b 6 

10 



Ida 

get 


0757 

ad 

12 



bsr 

putny b 


0759 

ad 

el 



bsr 

b ump 

go to next 

075b 

ad 

2e 



bsr 

puts 

finish up with a blank 

075d 

>31 




r t s 







* 

putby t 

print A in hex 





* 


A and X 

unchanged 

075e 

b7 

10 


p u t b y t 

s ta 

get 

save A 

0760 

44 




1 sra 



0761 

44 




1 sra 



0762 

44 




lsra 



0763 

44 




X sra 


shift high nybble down 

0764 

ad 

05 



b sr 

p utny b 

print it 

0766 

b6 

10 



Ida 

get 


0768 

ad 

01 



bsr 

putny b 

print low nybble 

076a 

81 




r t s 







* 

p u tny b 

print lower nybble of A in hex 





* 


A and X 

unchanged, high nybble 





* 


of A is 

i gnored. 

076b 

b7 

13 


p utny b 

sta 

ge t+3 

save A in yet another temp 

076d 

a4 

Of 



and 


mask off high nybble 

076f 

ab 

30 



add 

# '0 

add ascii zero 

0771 

a 1 

39 



cmp 

#'9 

check for A-F 

0773 

23 

02 



bis 

p u tny 2 


0775 

ab 

07 



add 

# 'A- / 9- 

1 adjustment for hex A-F 

0777 

c d 

08 

01 

putny2 

jsr 

p u tc 


077a 

b 6 

13 



Ida 

get+3 

restore A 

077c 

81 




r ts 







* 

crlf — 

— print 

carriage return, line feed 





■* 


A and 

X unchanged 

077d 

b7 

10 


crlf 

sta 

get 

save 

077 f 

a6 

Od 



Ida 

#CR 


0781 

c d 

08 

01 


jsr 

p u t c 


0784 

a6 

Oa 



Ida 

#LF 


0786 

ad 

79 



bsr 

p ut c 


0788 

b6 

10 



Ida 

get 

restore 

078a 

81 




r t s 
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* 

* 

puts — 

- print 

a blank (space) 






* 


A and 

X unchanged 



078 b 

5 7 

10 

puts 

sta 

get 

save 



0?8d 

at 

20 


Ida 

#BL 




07Sf 

ad 

70 


bsr 

putc 




0791 

b 6 

10 


Ida 

get 

restore 



0793 

81 



rts 








* 

* 

getby t 

get 

a hex byte from terminal 






* 

A gets 

the byte 

typed if it was a valid 

hex number/ 




* 

otherwise A gets the last character typed. 

The c-bit 

i s 




* 

set on 

non-hex characters; cleared otherwise. 

X 




* 

unchanged in any case. 



0794 

ad 

Of 

getb y t 

bsr 

getnyb 

build byte from 2 nybbles 



0796 

25 

Oc 


be s 

noby t 

bad character in input 



0798 

48 



as 1 a 





0799 

48 



as la 





079a 

48 



as la 





079b 

48 



as la 


shift nybble to high nybble 



079c 

b 7 

10 


sta 

get 

save it 



079e 

ad 

05 


b sr 

getnyb 

get low nybble now 



07a0 

25 

02 


b c s 

noby t 

bad character 



07a2 

bb 

10 


add 

get 

c-bit cleared 



07a4 

81 


noby t 

rts 








* 

getnyb 

get 

hex nybble from terminal 






* 

A gets 

the nybble typed if it was in the 

range 0 

-F, 




* 

otherwise A gets the character typed. The 

c-bit is 

set 




* 

on non 

-hex characters; cleared otherwise. X 

i s 





unchanged 




07a 5 

ad 

1c 

getnyb 

bsr 

getc 

get the character 



G7a7 

a4 

7f 


and 

#7.1111111 mask parity 



07a9 

b 7 

13 


s ta 

ge t+3 

save it just in case 



07ab 

aO 

30 


sub 

# '0 

subtract ascii zero 



07ad 

2b 

10 


bmi 

no the x 

was less than 'O' 



07af 

a 1 

09 


emp 

#9 




07b 1 

23 

Oa 


bis 

go t i t 




07fc3 

aO 

07 


sub 

#'A- ' 9- 

1 funny adjustment 



0755 

a 1 

Of 


emp 

#*F 

too big? 



0757 

22 

06 


b h i 

nothe x 

was greater than 'F' 



07b 9 

a 1 

09 


emp 

#9 

check between 9 and A 



07b b 

23 

02 


bis 

no the x 




075 d 

98 


got i t 

clc 


c=0 means good hex char 



07be 

81 



rts 





07b f 

b6 

13 

no the x 

Ida 

ge t+3 

get saved character 



07c 1 

99 



sec 





07c2 

81 



rts 


return with error 






* 

Seri 

a 1 I 

/ 0 Routines 




* 
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* These subroutines are modifications of the original NMOS 

* version Differences are due to the variation in cycle 

* time of CMOS instructions vs. NMOS. 

* 

* Since the INT and TIMER interrupt vectors are used in the 

* bicycle odometer* the I-bit should always be set when 

* running the monitor. Hence* the code that fiddles with 

* the I-bit has been eliminated.. 

* 

* 

* Definition of serial I/O lines 

* 

* Note: changing 'in' or 'out' will necessitate changing the 

* way 'put' is setup during reset. 


07c3 

00 

02 


put 

equ 

p or tc 

ser ia 1 I/O port 

07c3 

00 

02 


in 

equ 

2 

serial input line# 

07c 3 

00 

03 


out 

equ 

3 

serial output line# 





* 

getc 

get a 

character from the terminal 






A get 

s the character typed, X is unchanged 

07 c 3 

bf 

15 


getc 

St X 

x temp 

save X 

07 c 5 

a6 

08 



Ida 

#8 

number of bits to read 

07 c 7 

b7 

17 



s ta 

count 


07c9 

04 

02 

f d 

getc 4 

br set 

in* put 

* getc4 wait far hilo transition 





* 

delay 

1/2 bit 

time 

07 c c 

b6 

02 



Ida 

put 


07 c e 

a4 

03 



and 

#7.1 1 

get current baud rate 

07d0 

97 




ta x 



07d 1 

de 

08 

4b 


Idx 

delays 

* x get loop constant 

07 d 4 

a6 

04 


ge t c3 

Ida 

#4 


07d6 

9d 



ge t c2 

nop 



Q7d7 

4a 




deca 



07 d 8 

26 

fc 



b ne 

ge tc2 


07 da 

5d 




t St X 


loop padding 

07d b 

14 

02 



b se t 

in* put 

ditto 

07d d 

14 

02 



b set 

in, put 

CMOS ditto 

07df 

5a 




dec x 



07e0 

26 

f 2 



bne 

ge tc3 

major loop test 





* 

now we should 

be in the middle of the start bit 

07e2 

04 

02 

e4 


br set 

in, put 

, getc4 false start bit test 

07e5 

7d 




t s t 

* X 

more timing delays 

Q7e6 

7d 




t s t 

• X 


07e7 

7d 




t s t 

, X 






* 

main 

loop for 

getc 

07e8 

ad 

46 


getc 7 

b sr 

delay 

<6> common delay routine 

07ea 

05 

02 

00 


br c Ir 

in* put 

, getc6 (5) test input and set c 

07 ed 

7d 



ge tc6 

ts t 

, X 

<4> timing equalizer 
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07 ee 

9d 



nop 


(2> CMOS eq.ua 1 i zat i on 

07e f 

9d 



nop 


(2) CMOS equalization 

07 fO 

9d 



nop 


(2) CMOS equalization 

07 f 1 

9d 



nop 


(2) CMOS equalization 

07f 2 

9d 



nap 


(2) CMOS equalization 

07f 3 

9d 



nop 


(2) CMOS equalization 

07 f 4 

36 

1 to 


r or 

char 

<5) add this bit to the byte 

07f 6 

3a 

17 


dec 

c oun t 

(5) 

07f 8 

26 

ee 


b ne 

getc7 

(3) still more bits to get(see?> 

07f a 

ad 

34 


b sr 

delay 

wait out the 9th bit 

07 fc 

b6 

1 6 


Ida 

char 

get assembled byte 

07f e 

be 

15 


Idx 

x temp 

restore x 

0800 

81 



r ts 


and return 




* 

p u t c 

print 

a on the terminal 




* 

X and 

A unchanged 

0801 

b 7 

16 

p u tc 

s ta 

char 


0803 

b 7 

14 


s ta 

a temp 

save it in both places 

0805 

b f 

15 


s t X 

x temp 

don't forget about X 

0807 

36 

09 


Ida 

#9 

going to put out 

0809 

b7 

17 


s ta 

count 

9 bits this time 

080b 

5f 



c lr x 


for very obscure reasons 

080c 

98 



clc 


this is the start bit 

080d 

20 

02 


bra 

pu tc2 

jump in the middle of things 




* 

main 

loop for putc 

080f 

36 

16 

p u tc 5 

r or 

char 

(5) get next bit from memory 

0811 

24 

04 

p ut c2 

b c c 

p u t c3 

(3) now set or clear port bit 

0813 

16 

02 


b se t 

out, put 


0815 

20 

04 


bra 

p u t c4 


0817 

17 

02 

p utc3 

b c lr 

out, put 

(5) 

0819 

20 

00 


bra 

p u t c4 

<3) equalize timing again 

081b 

dd 

08 30 

p ut c 4 

jsr 

delay, x 

(7> must be 2-byte indexed jsr 




* 



this is why X must be zero 

081 e 

43 



c oma 


(3) CMOS equalization 

081 f 

43 



c oma 


(3) CMOS equalization 

0820 

43 



c oma 


(3) CMOS equalization 

0821 

3a 

17 


dec 

count 

< 5 ) 

0823 

26 

ea 


bne 

p u t c 5 

(3) still more bits 

0825 

14 

02 


b se t 

in, put 

7 cycle delay 

0827 

16 

02 


b se t 

out, put 

send stop bit 

0829 

ad 

05 


b sr 

delay 

delay for the stop bit 

082b 

be 

15 


1 d x 

x temp 

restore X and 

082d 

b6 

14 


Ida 

a temp 

of course A 

082 f 

81 



r t s 






# 

delay 

precise delay for getc/putc 

0830 

b6 

02 

delay 

Ida 

put 

first, find out 
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0832 

a4 

03 



and 

#%11 what the baud rate is 

0834 

97 




tax 


0835 

de 

08 

4b 


Idx 

delags* x loop constant from table 

0838 

a6 

f 8 



Ida 

#*F8 funng adjustment for subroutine overhead 

083a 

ab 

09 


de 13 

add 

#♦09 

083c 




de 12 



083c 

9d 




nop 

CMOS equalization 

083d 

4a 




de ca 


083e 

26 

fc 



bne 

de 12 

0840 

5d 




t s t X 

loop padding 

0841 

14 

02 



b se t 

in* put ditto 

0843 

14 

02 



b se t 

in* put CMOS ditto 

0845 

5a 




dec x 


0846 

26 

f 2 



b ne 

del3 main loop 

0848 

9d 




nop 

CMOS equalization 

0849 

9d 




nop 

CMOS equalization 

084a 

81 




r ts 

with X still equal to zero 





* 

de lag s 

for baud rate calculation 





* 

This table must not be put on page zero since 





* 

the accessing must take 6 cycles 

084b 

20 



de lag s 

fcb 

32 300 baud 

084 c 

08 




fcb 

8 1200 baud 

084d 

02 




fcb 

2 4800 baud 

084« 

01 




fcb 

1 9600 baud 





* 

reset — 

- power on reset routine 





* 

Based on a port bit* run the bicgcle odometer or the monitor. 

084f 




reset 



084f 

Oe 

02 

03 


br set 

7. p or tc * other 

0852 

cc 

01 

54 


jmp 

odo be a bicgcle odometer 





* 

run the 

mon i tor 

0855 




other 



0855 

a6 

08 



Ida 

#X1000 setup port for serial io 

0857 

b7 

02 



s ta 

put set output to mark level 

0859 

b7 

06 



s ta 

put+ddr set ddr to have one output 





* 

print sign-on message 

085b 

5f 




c lr x 


085c 

d6 

08 

6c 

babble 

Ida 

msg* x get next character 

085f 

al 

00 



cmp 

#EOS last char? 

0861 

27 

06 



beq 

mstart ges* start monitor 

0863 

c d 

08 

01 


jsr 

putc and print it 

0866 

5c 




inc x 

advance to next char 

0867 

20 

f 3 



bra 

babble more message 

0869 




ms tar t 



0869 

83 




swi 

push machine state and go to monitor routine 

086a 

20 

«3 



bra 

reset loop around 
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* 

msg 

power up message 

086c 

Od 

Oa 

msg 

fcb 

CR,LF 

086e 

31 

34 36 38 

30 35 

fee 

/ 14680502/ 


47 

32 




0876 

00 



fcb 

EOS 


* 


******************************************************************* 


* interrupt vectors 

* 


1 f f 6 



or g 

MEMSIZ- 

10 start of vectors 

1 f f 6 

01 

eO 

fdb 

onemi 1 

exit wait state \ 

If f8 

01 

eO 

fdb 

onemi 1 

timer interrupt !— 

1 f f a 

02 

46 

fdb 

whee 1 

e xternal interrupt / 

Iffc 

06 

92 

fdb 

moni t 

swi to main entry point 

lffe 

08 

4f 

fdb 

reset 

power on vector 


odometer 


vec tors 
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